home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Libris Britannia 4
/
science library(b).zip
/
science library(b)
/
TECHNICA
/
AUTOCAD
/
3278.ZIP
/
DESCAD.MNU
< prev
next >
Wrap
Text File
|
1991-10-13
|
3KB
|
134 lines
***Comment
DESCAD
Civil Engineering and Surveying utilities for AutoCAD
(c) 1991 Sean O'Dell (CITITECH)
***POP1
[Modules]
[DES-Init]^c^cvslide desscr1 (if (not soj) (progn (load "DESCAD-B") (soj)));$p2=init $p2=*
[~--]
[DES-Edit]^c^credraw (if (and (not c:dxfsub) soj) (load "DESCAD-1"));$p3=edit $p3=*
[DES-Draw]^c^credraw (if (and (not c:north) soj) (load "DESCAD-2"));$p4=draw $p4=*
[~--]
[DES-I/O]^c^credraw (if (and (not c:import) soj) (load "DESCAD-3"));$p5=io $p5=*
[DES-Anot]^c^credraw (if (and (not c:anot) soj) (load "DESCAD-4"));$p6=anot $p6=*
[DES-Sta]^c^credraw (if (and (not c:keysta) soj) (load "DESCAD-5"));$p7=sta $p7=*
[DES-Surv]^c^credraw (if (and (not c:figpt) soj) (load "DESCAD-6"));$p8=surv $p8=*
**init
[DES-Init]
[RETALI Restore view]^c^cretali
[SETALI Rotate view]^c^csetali
[~--]
[NOTES Display external notes]^c^cnotes display
[NOTES Edit external notes]^c^cnotes edit
[SCALES Window]^c^cscales window
[SCALES Extents]^c^cscales extents
[~--]
[LAYENT Change layer by entity]^c^clayent
[LAYSTEP Go to next layer]^c^claystep
[~--]
[LOCPT Locate pt visually]^c^clocpt
[LISTPT List DESCAD pt no]^c^clistpt
[~--]
[(acres) Convert last area to acres](acres)
[(arc) Coords of arc endpt](arc)
[(#) Coords of DESCAD pt no](#)
[~--]
[TEXTED Text editor]^c^ctexted
[~--]
[STAMP Current date/time/dwg name]^c^cstamp
**edit
[DES-Edit]
[DXFSUB Substitute DXF values]^c^cdxfsub
[MATCH Entity DXF values]^c^cmatch
[TEXTRITE Text read right/up]^c^ctextrite
[~--]
[COPYLAY Copy to layer]^c^ccopylay
[OFFLAY Offset to layer]^c^cofflay
[~--]
[ALIOBJS Align objects to pline]^c^caliobjs
[INCPOLY Re-Increment pline]^c^cincpoly
[MPLINE Make pline of lines/arcs]^c^cmpline
[~--]
[QTHAW Quick layer thaw]^c^cqthaw
**draw
[DES-Draw]
[NORTH Arrow]^c^cnorth
[FLOW Lines]^c^cflow
[TICKFIG Tick-mark Pline]^c^ctickfig
[~--]
[PLTPT Plot points in DWG]^c^cpltpt
[~--]
[LABELV Tag pt elev]^c^clabelv
[LABPAD Label pad elev]^c^clabpad
**io
[DES-I/O]
[IMPORT Coordinate file]^c^cimport
[EXPORT Coordinate file]^c^cexport
[~--]
[TEXTIN Import ASCII file]^c^ctextin
**anot
[DES-Anot]
[ANOT Set parameters]^c^canot s
[ANOT Repair changed line/arc]^c^canot r
[ANOT Figure]^c^canot f
[ANOT Tangent]^c^canot t
[ANOT Curve]^c^canot c
[~--]
[TABLE Generate table]^c^ctable
**sta
[DES-Sta]
[SETSTA Set up pline]^c^csetsta
[KEYSTA Anot by station number]^c^ckeysta
[PICKSTA Anot by pick point]^c^cpicksta
**surv
[DES-Surv]
[PROTECT ON]^c^cprotect on
[PROTECT OFF]^c^cprotect off
[~--]
[SETPT Set new pt and no]^c^csetpt
[~--]
[FIGPT Set pts along pline]^c^cfigpt
[DEFBLOV Define child block of pts]^c^cdefblov
[BLKOVER Single insert over parent block]^c^cblkover s
[BLKOVER Global insert over parent blocks]^c^cblkover a
[~--]
[APNTON Generate nos for empty pts]^c^capnton
***POP2
***POP3
***POP4
***POP5
***POP6
***POP7
***POP8
***SCREEN
[]
[DESCAD]^c^c(grtext -1 "DESCAD Tech Support (310) 842-8665")